home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 7
/
Aminet 7 - August 1995.iso
/
Aminet
/
comm
/
tcp
/
Netdial4_0.lha
/
AmiTCP_Netdial4.0
/
netdial.connect
< prev
next >
Wrap
AmigaDOS Script File
|
1980-05-28
|
1KB
|
63 lines
.key HOSTNAME/A,HOSTADDRESS/A,IPADDRESS/A,USERNAME/A,IPTYPE/A
.bra {
.ket }
.def HOSTNAME badhost
.def HOSTADDRESS 0.0.0.0
.def IPADDRESS 0.0.0.0
.def USERNAME noname
.def IPTYPE cslip0
; log in
echo
echo login: {USERNAME} : {IPADDRESS} at {HOSTNAME} : {HOSTADDRESS} using {IPTYPE}
echo
; AmiTCP:bin/login -f {USERNAME}
AmiTCP:bin/umask 022
AmiTCP:AmiTCP
WaitForPort AMITCP
; Configure loop-back device
AmiTCP:bin/ifconfig lo0 localhost
; Assure that ENV:Sana2 exists
if not exists ENV:Sana2
makedir ENV:Sana2
endif
; Create cslip0 configuration file
;echo >env:sana2/cslip0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
echo >env:sana2/slip0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
echo >env:sana2/ppp0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
echo >env:sana2/{IPTYPE}.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
; Configure cslip0
AmiTCP:bin/ifconfig {IPTYPE} {IPADDRESS} {HOSTADDRESS}
; Add route to this host
AmiTCP:bin/route add {IPADDRESS} localhost
AmiTCP:bin/route add {HOSTADDRESS} {HOSTNAME}
; Add route to the default gateway
AmiTCP:bin/route add default {HOSTADDRESS}
echo Routing Completed
setenv HOSTNAME `AmiTCP:bin/hostname`
echo Hostname Assigned
Assign TCP: Exists >NIL:
echo TCP Assigned
IF Warn
echo mounting TCP:
Mount TCP: from AmiTCP:devs/Inet-Mountlist
EndIf
echo Start the internet `super server'
run AmiTCP:bin/inetd >NIL:
endcli